      data LMHMbs(1) /11.7000/

      data (RGBb_coef(1,i),i=1,nRGBbc) /
     &     +6.047230D-01,
     &     +1.397240D+00,
     &     -8.249630D-02,
     &     +1.141430D+00,
     &     +0.000000D+00/

!     0.00010     LMR1
      data (mrange(1,1,i),i=1,3) /0,5,1/
      data (rrange(1,1,i),i=1,3) /0,5,1/
      data (alphas(1,1,i),i=1,36) /
     &     +1.49884369566236408389D+01,
     &     +3.55674019216888570583D+00,
     &     -1.50579325323499482181D+01,
     &     +2.74507278637946647848D+01,
     &     -2.40420132204742671433D+01,
     &     +6.08559902401751795509D+00,
     &     +4.77689517615753889146D+00,
     &     -3.52448257631879471319D+01,
     &     +1.26181509166749165729D+02,
     &     -2.05760448139415075275D+02,
     &     +1.66826460262414656199D+02,
     &     -4.13681688626000720888D+01,
     &     -4.03038048915965774199D+00,
     &     +5.94984473818373302834D+01,
     &     -3.15891070807037635859D+02,
     &     +5.63465810280387586317D+02,
     &     -4.56401018552895436642D+02,
     &     +1.12357256780075772440D+02,
     &     -2.22258127619659440199D+00,
     &     +1.21818087660567726971D+02,
     &     -6.06793401690043339158D+01,
     &     -2.73750098046708558286D+02,
     &     +3.80968083978251002009D+02,
     &     -1.07210865421446229107D+02,
     &     -4.95448396548353997559D+01,
     &     -1.05676079281290000722D+02,
     &     +3.74254532751612941865D+02,
     &     -2.84755814237885886087D+02,
     &     +5.32060692031168436245D+00,
     &     +1.94841031059088862776D+01,
     &     +5.85417149247924371025D+01,
     &     -6.46713025038344397899D+01,
     &     -8.04514035300949643670D+01,
     &     +1.54013846765123219029D+02,
     &     -6.62783052076742649206D+01,
     &     +9.83910595056972248074D+00/
      
!     0.00010     LMR2
      data (mrange(1,2,i),i=1,3) /0,5,1/
      data (rrange(1,2,i),i=1,3) /0,5,1/
      data (alphas(1,2,i),i=1,36) /
     &     +2.10206064943832124925D+01,
     &     -2.39940628010456791230D+01,
     &     +3.67437434259622861532D+01,
     &     -2.87504026348741277275D+01,
     &     +1.10696952815601967757D+01,
     &     -1.67354101724841819454D+00,
     &     +6.24726695402092602194D+01,
     &     -2.25859701401090774198D+02,
     &     +3.25693445380178616233D+02,
     &     -2.28906270354160255920D+02,
     &     +7.82835291167177160787D+01,
     &     -1.04409269263635096081D+01,
     &     +1.68774936141528343114D+02,
     &     -4.70922534725343496120D+02,
     &     +5.20150477052292671942D+02,
     &     -2.82942436111233064366D+02,
     &     +7.54607477257930696624D+01,
     &     -7.80062541052705249456D+00,
     &     +1.26323501968766254322D+03,
     &     -5.43724065618109580100D+03,
     &     +9.47031538171058127773D+03,
     &     -8.20344328990647773026D+03,
     &     +3.48253888526251739677D+03,
     &     -5.75361752664876235031D+02,
     &     +1.45320316532362594444D+04,
     &     -6.10692503818239565589D+04,
     &     +9.45752483181984280236D+04,
     &     -6.92033750093292765087D+04,
     &     +2.43234260768021413242D+04,
     &     -3.32540856427475091550D+03,
     &     -7.83727239733487567719D+03,
     &     +6.87101874631883547409D+04,
     &     -1.42788737041162559763D+05,
     &     +1.25369407779255416244D+05,
     &     -5.05985607497797464021D+04,
     &     +7.77505329663658358186D+03/
      
!     0.00010     LMA
      data (mrange(1,3,i),i=1,3) /0,10,1/
      data (rrange(1,3,i),i=1,3) /0,10,1/
      data (alphas(1,3,i),i=1,121) /
     &     +1.77846204423370872973D+04,
     &     -1.11008631122171675088D+05,
     &     +3.07385212080689030699D+05,
     &     -4.97253519789625774138D+05,
     &     +5.20899845929651521146D+05,
     &     -3.69562230436008889228D+05,
     &     +1.79995285036839370150D+05,
     &     -5.94766776453754428076D+04,
     &     +1.27704226161695205519D+04,
     &     -1.60998313917297696207D+03,
     &     +9.05540938508377593053D+01,
     &     +1.27448576992469941615D+05,
     &     -8.26126519162579439580D+05,
     &     +2.40616127883097669110D+06,
     &     -4.13147857106406055391D+06,
     &     +4.61530595326700154692D+06,
     &     -3.49471896526116924360D+06,
     &     +1.81238210394326946698D+06,
     &     -6.34629941238884348422D+05,
     &     +1.43452093324876565021D+05,
     &     -1.88911385051759207272D+04,
     &     +1.10039680760221062883D+03,
     &     -1.11280780545824207366D+06,
     &     +6.52773804973363596946D+06,
     &     -1.68385778483916968107D+07,
     &     +2.51369743430132977664D+07,
     &     -2.40291083278050050139D+07,
     &     +1.53511958359827548265D+07,
     &     -6.62599811194045469165D+06,
     &     +1.90266653405042551458D+06,
     &     -3.46290151645659178030D+05,
     &     +3.57968178594517958118D+04,
     &     -1.57403299302352661471D+03,
     &     +3.61468220664994791150D+06,
     &     -1.42838660574260130525D+07,
     &     +9.89719916261141002178D+06,
     &     +4.17630757517836764455D+07,
     &     -1.13186791305614486337D+08,
     &     +1.34723130784819722176D+08,
     &     -9.39780759352868050337D+07,
     &     +4.08028988015334084630D+07,
     &     -1.08834827876409199089D+07,
     &     +1.63703844878768618219D+06,
     &     -1.06502153903636033647D+05,
     &     -2.18383920460389368236D+07,
     &     +1.01377685264262214303D+08,
     &     -1.24736986550756111741D+08,
     &     -1.38097782211961090565D+08,
     &     +5.82118970734395384789D+08,
     &     -7.72188668410225749016D+08,
     &     +5.69788365736976385117D+08,
     &     -2.56651440166880398989D+08,
     &     +7.03184175257203429937D+07,
     &     -1.07993168413460906595D+07,
     &     +7.14464107997456681915D+05,
     &     +6.22013266083969771862D+07,
     &     -3.70892432569035887718D+08,
     &     +7.32722076455112814903D+08,
     &     -3.41863748162672758102D+08,
     &     -8.72008743590860724449D+08,
     &     +1.70439955004952502251D+09,
     &     -1.44412099096650505066D+09,
     &     +7.01467443390604257584D+08,
     &     -2.01846242185972064734D+08,
     &     +3.21032091475058645010D+07,
     &     -2.18098983308966364712D+06,
     &     +8.32790288301304075867D+06,
     &     +1.67320728489836782217D+08,
     &     -4.90329729719172537327D+08,
     &     -3.57015713222805708647D+07,
     &     +1.73606751974490427971D+09,
     &     -2.95511773960293579102D+09,
     &     +2.49140620948586368561D+09,
     &     -1.22675662513774180412D+09,
     &     +3.58779851358991682529D+08,
     &     -5.79478609330464825034D+07,
     &     +3.99136670739177288488D+06,
     &     -3.09375949266583919525D+08,
     &     +1.30927392519327545166D+09,
     &     -2.71972201258040809631D+09,
     &     +4.17056345501154565811D+09,
     &     -5.31121138472141742706D+09,
     &     +5.18211883778930091858D+09,
     &     -3.52386318383868503571D+09,
     &     +1.57889703104470300674D+09,
     &     -4.41837538483527064323D+08,
     &     +6.98762237560149580240D+07,
     &     -4.76660235680679418147D+06,
     &     +5.32124163954892635345D+08,
     &     -2.58332422589960527420D+09,
     &     +5.78740993511894130707D+09,
     &     -8.18639627587050056458D+09,
     &     +8.33603336255734443665D+09,
     &     -6.37392318348361968994D+09,
     &     +3.59443787565530967712D+09,
     &     -1.42294472536891078949D+09,
     &     +3.68482395798513412476D+08,
     &     -5.55465651649229973555D+07,
     &     +3.67803603909488115460D+06,
     &     -3.67132831968976199627D+08,
     &     +1.87202460446496915817D+09,
     &     -4.32871663092040729523D+09,
     &     +6.09032624990053653717D+09,
     &     -5.87735082626143074036D+09,
     &     +4.10221144979333591461D+09,
     &     -2.08821944738185024261D+09,
     &     +7.54238944109313964844D+08,
     &     -1.81710771632690608501D+08,
     &     +2.59757891273681670427D+07,
     &     -1.65624886172299087048D+06,
     &     +9.30481611941920518875D+07,
     &     -4.87096365846687316895D+08,
     &     +1.14762701275433015823D+09,
     &     -1.62114284406450057030D+09,
     &     +1.53847292382848095894D+09,
     &     -1.03373922282777369022D+09,
     &     +4.99196402871803343296D+08,
     &     -1.70266350400250434875D+08,
     &     +3.88883041814338341355D+07,
     &     -5.31391571130599640310D+06,
     &     +3.26864794701321807224D+05/

!     0.00010     HM
      data (mrange(1,4,i),i=1,3) /0,10,1/
      data (rrange(1,4,i),i=1,3) /0,15,1/
      data (alphas(1,4,i),i=1,176) /
     &     +3.04240080558681453113D+05,
     &     -7.24150360611511170864D+07,
     &     +2.70646920133822739124D+08,
     &     -4.33003387311595380306D+08,
     &     +4.03091375320128858089D+08,
     &     -2.49456192293578892946D+08,
     &     +9.70010504787636250257D+07,
     &     -8.23838906384931178764D+05,
     &     -3.28722313181499056518D+07,
     &     +2.78880451327459998429D+07,
     &     -1.40338722991762422025D+07,
     &     +5.06007529781199898571D+06,
     &     -1.37089679529935028404D+06,
     &     +2.68858224094756355044D+05,
     &     -3.36690685426766431192D+04,
     &     +1.98948270157709225714D+03,
     &     +5.37679127182313203812D+07,
     &     +1.46388718178314149380D+08,
     &     -9.35395212179676651955D+08,
     &     +1.55915548629785561562D+09,
     &     -1.34035874177675724030D+09,
     &     +7.60583187397939205170D+08,
     &     -3.48267020550069510937D+08,
     &     +1.27565538716441661119D+08,
     &     -2.52623368581141643226D+07,
     &     -2.38211218436619313434D+06,
     &     +2.83049418278661277145D+06,
     &     -1.12351439162609330378D+06,
     &     +5.12258502489926875569D+05,
     &     -1.87547968379564146744D+05,
     &     +3.78142640863094275119D+04,
     &     -3.14819542193592815238D+03,
     &     -2.72150296501208603382D+08,
     &     +2.54191144958757966757D+08,
     &     +1.09221455545737147331D+09,
     &     -2.27038845949890232086D+09,
     &     +1.74805773803573489189D+09,
     &     -6.91637455687782287598D+08,
     &     +2.04606336638418078423D+08,
     &     -7.53842029037321358919D+07,
     &     +1.98339755878359973431D+07,
     &     -2.51659290353266568854D+06,
     &     +2.78171596346601564437D+06,
     &     -2.17292116712976712734D+06,
     &     +6.62271515154829132371D+05,
     &     -6.85233401404126780108D+04,
     &     -7.24533940448010434920D+03,
     &     +1.77091708853070326768D+03,
     &     +5.84549742654761433601D+08,
     &     -1.22755266303496289253D+09,
     &     -1.99841301217404045165D+07,
     &     +1.62942775427007746696D+09,
     &     -1.29122969498875904083D+09,
     &     +2.81517572141482591629D+08,
     &     +3.29046875321928299963D+07,
     &     -2.18449690962994331494D+06,
     &     -2.63601564748177304864D+06,
     &     -4.48942869859682396054D+06,
     &     +2.44109624343642685562D+06,
     &     -4.88764745659762818832D+05,
     &     +5.56227389265404126490D+04,
     &     -2.70979608753431966761D+03,
     &     +1.47652876079566203771D+03,
     &     -5.79993594759073516798D+02,
     &     -6.80110049336398720741D+08,
     &     +1.85585044735255384445D+09,
     &     -1.28215713107603287697D+09,
     &     -3.01044179228078424931D+08,
     &     +5.51112592108273148537D+08,
     &     -7.78949714611403048038D+07,
     &     -3.93153402725159674883D+07,
     &     -1.19108830926259383559D+07,
     &     +1.43100595134035050869D+07,
     &     -4.91528834089644718915D+06,
     &     +1.68842217521909135394D+06,
     &     -1.75640131265274452744D+05,
     &     -1.40626545874571602326D+05,
     &     +3.77159267968944986933D+04,
     &     -1.39635312769678466793D+03,
     &     -1.88574192421971709166D+01,
     &     +4.31829985381816327572D+08,
     &     -1.41004882914948272705D+09,
     &     +1.38554457511777806282D+09,
     &     -3.82333992940614879131D+08,
     &     -7.42225503488553911448D+07,
     &     +1.56423537414295095950D+07,
     &     +1.26731311307457205839D+06,
     &     +8.38170131250077579170D+06,
     &     +1.69866128198041976430D+06,
     &     -2.63807965752872545272D+06,
     &     -1.30410926100970245898D+05,
     &     +2.79376974434808362275D+05,
     &     -2.47335903090722194975D+03,
     &     -8.09120832153944047604D+03,
     &     -1.18437059561102614680D+03,
     &     +2.22406017739857361448D+02,
     &     -1.05728919394894704223D+08,
     &     +4.78614212386758863926D+08,
     &     -5.47275303584568023682D+08,
     &     +1.81002869935932725668D+08,
     &     +2.37412980302353836596D+07,
     &     -1.49761239025783911347D+07,
     &     +6.94548275970081239939D+06,
     &     -7.08765067577983532101D+06,
     &     +6.15334952530000591651D+05,
     &     +1.04307962681467283983D+06,
     &     -1.66822670094482309651D+05,
     &     -3.14983610603470224305D+04,
     &     -8.67230359049541766581D+03,
     &     +3.35310141926492042330D+03,
     &     +5.20457690967627286227D+02,
     &     -9.46886765048879937012D+01,
     &     -4.00641674232298433781D+07,
     &     +3.53151559413958713412D+07,
     &     -3.32651288367051668465D+07,
     &     +8.78685073832835257053D+07,
     &     -8.83196869217660874128D+07,
     &     +3.53058029766001477838D+07,
     &     -2.53460763685103179887D+06,
     &     -3.27478091701123584062D+06,
     &     +1.51544590128077217378D+06,
     &     -1.97898065117523074150D+05,
     &     -4.86252464679210970644D+04,
     &     +3.00813760869401539821D+03,
     &     +9.57301967925047574681D+03,
     &     -2.60470610160503747466D+03,
     &     +1.71621252115364512747D+02,
     &     -4.79603274832587800347D+00,
     &     +3.64528375028086900711D+07,
     &     -7.85125069899140596390D+07,
     &     +7.79785535495323836803D+07,
     &     -5.67020461767953187227D+07,
     &     +3.75835219815801903605D+07,
     &     -2.08943791429358497262D+07,
     &     +7.66625923235765285790D+06,
     &     -1.06592743443907494657D+06,
     &     -3.14079768184977932833D+05,
     &     +1.45893387703247601166D+05,
     &     -2.00583693587448651670D+04,
     &     -1.07287338880777724626D+03,
     &     +1.86369211872262280849D+03,
     &     -5.41388893973812855620D+02,
     &     +3.82187077215814881015D+01,
     &     +4.76195893580739504358D+00,
     &     -9.92938956532538309693D+06,
     &     +2.04695142809341102839D+07,
     &     -1.02214338619423378259D+07,
     &     -9.93348938946167938411D+06,
     &     +1.64549253709395211190D+07,
     &     -9.86318830775812268257D+06,
     &     +3.13746389613276068121D+06,
     &     -6.67069913326343754306D+05,
     &     +2.16856145024514931720D+05,
     &     -1.08820304041782830609D+05,
     &     +3.55738569172507050098D+04,
     &     -3.12188240990893382332D+03,
     &     -1.97305440808249090878D+03,
     &     +7.01633632749421281005D+02,
     &     -8.03244389802174652004D+01,
     &     +1.98516265048327333886D+00,
     &     +1.05106274467385723256D+06,
     &     -1.90074146260506426916D+06,
     &     -5.14866259700076945592D+05,
     &     +4.43767094488164782524D+06,
     &     -5.41318389280360378325D+06,
     &     +3.27827314338852465153D+06,
     &     -1.00315844098674086854D+06,
     &     +3.13072588745724533510D+04,
     &     +1.04236830211061693262D+05,
     &     -4.78932228588938814937D+04,
     &     +1.31090834075820221187D+04,
     &     -3.39479313977342053477D+03,
     &     +9.29207146820721618496D+02,
     &     -1.86795988806825192796D+02,
     &     +1.98510067854014131683D+01,
     &     -7.40917959154837491020D-01/

!     0.00010     Recom
      data (mrange(1,5,i),i=1,3) /0,9,1/
      data (rrange(1,5,i),i=1,3) /0,9,1/
      data (alphas(1,5,i),i=1,100) /
     &     +1.43249838796439163957D+01,
     &     -1.34095062880606157307D+01,
     &     +6.08550621146791144156D+01,
     &     -1.46577101984033276949D+02,
     &     +2.10671492276514470632D+02,
     &     -1.92066044872448998149D+02,
     &     +1.12528193269927839992D+02,
     &     -4.10571661215909387010D+01,
     &     +8.47360078103331737509D+00,
     &     -7.53719632151268914555D-01,
     &     -4.69105628993968171159D+00,
     &     +8.90187555533843095645D+01,
     &     -5.17082466752443224323D+02,
     &     +1.49287044908038524227D+03,
     &     -2.42034351477910740869D+03,
     &     +2.35977318225110639105D+03,
     &     -1.41747263752418666627D+03,
     &     +5.14675357902906625895D+02,
     &     -1.03788126354235686222D+02,
     &     +8.93875687034091015448D+00,
     &     -1.98086570192114912459D+01,
     &     +9.02725480979547114657D+01,
     &     +3.72962652775568585639D+02,
     &     -2.86443864935814417549D+03,
     &     +6.54791371890192021965D+03,
     &     -7.57542293321982197085D+03,
     &     +4.98863219830037542124D+03,
     &     -1.90003291421173662457D+03,
     &     +3.91370534933327633098D+02,
     &     -3.38888734262211954729D+01,
     &     -7.61727485013823990556D+00,
     &     -8.99676221452425437519D+01,
     &     +2.39429289955121817002D+02,
     &     +2.05771307220595781473D+03,
     &     -7.66672108820838730026D+03,
     &     +1.07610646452268938447D+04,
     &     -7.83052958018395565887D+03,
     &     +3.14853537506878637942D+03,
     &     -6.66805677756379054699D+02,
     &     +5.84483701602106719974D+01,
     &     +6.84689749428262302899D+02,
     &     -6.41337423137322639377D+03,
     &     +2.14353806903193471953D+04,
     &     -3.96806322513512059231D+04,
     &     +4.68443039997480664169D+04,
     &     -3.66080543837553850608D+04,
     &     +1.87025281715490273200D+04,
     &     -5.95491842750383239036D+03,
     &     +1.06698781883290007499D+03,
     &     -8.22032529086119865269D+01,
     &     -1.08938704804548956417D+03,
     &     +1.48146628563555968867D+04,
     &     -5.75561987341030326206D+04,
     &     +1.11350161916194265359D+05,
     &     -1.26655054015904039261D+05,
     &     +9.02577656921312009217D+04,
     &     -4.08346371174871092080D+04,
     &     +1.13850781915498100716D+04,
     &     -1.78117510051617318823D+03,
     &     +1.19593664869470444501D+02,
     &     +7.71158520059956913428D+01,
     &     -1.14063205364834775537D+04,
     &     +5.61224719137911379221D+04,
     &     -1.19398022502862586407D+05,
     &     +1.41535388629036053317D+05,
     &     -1.01977152037983221817D+05,
     &     +4.57325986781135798083D+04,
     &     -1.24671193954050559114D+04,
     &     +1.88748088780042576218D+03,
     &     -1.21427200114438761602D+02,
     &     +7.51859271237372013275D+02,
     &     +2.60919535160936538887D+03,
     &     -2.43703099252169959072D+04,
     &     +6.04402419973716023378D+04,
     &     -7.66051639442676823819D+04,
     &     +5.70820587259594394709D+04,
     &     -2.60263704770619915507D+04,
     &     +7.14161111890670417779D+03,
     &     -1.08138895268239821235D+03,
     &     +6.92421978398739810245D+01,
     &     -4.88596016673188898949D+02,
     &     +6.06324096291598948483D+02,
     &     +4.18032368029227109218D+03,
     &     -1.41908964780536971375D+04,
     &     +1.99120584653974874527D+04,
     &     -1.55743938039613858564D+04,
     &     +7.29395282901822793065D+03,
     &     -2.03371603812545799883D+03,
     &     +3.11077689089091336427D+02,
     &     -2.00523533590040692332D+01,
     &     +9.23231057243035166948D+01,
     &     -2.49558777666313233112D+02,
     &     -9.91094586704329287841D+01,
     &     +1.18411592281756065859D+03,
     &     -1.97229180010892332575D+03,
     &     +1.65110538528935694558D+03,
     &     -8.01140239767901903178D+02,
     &     +2.28187127507413094918D+02,
     &     -3.54063664898269081505D+01,
     &     +2.30675599774240458473D+00/
